home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The CICA Windows Explosion!
/
The CICA Windows Explosion! - Disc 2.iso
/
programr
/
upc12bs1.zip
/
LIB
/
mkmbox.c
< prev
next >
Wrap
C/C++ Source or Header
|
1993-07-12
|
3KB
|
90 lines
/*--------------------------------------------------------------------*/
/* m k m b o x . c */
/*--------------------------------------------------------------------*/
/*--------------------------------------------------------------------*/
/* Changes Copyright (c) 1990-1993 by Kendra Electronic */
/* Wonderworks. */
/* */
/* All rights reserved except those explicitly granted by the */
/* UUPC/extended license agreement. */
/*--------------------------------------------------------------------*/
/*--------------------------------------------------------------------*/
/* RCS Information */
/*--------------------------------------------------------------------*/
/*
* $Id: mkmbox.c 1.2 1993/07/13 01:13:32 ahd Exp $
*
* Revision history:
* $Log: mkmbox.c $
* Revision 1.2 1993/07/13 01:13:32 ahd
* Limit directory names for users to eight characters
*
*
* 21Nov1991 Break out of hlib.c ahd
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
/*--------------------------------------------------------------------*/
/* UUPC/extended include files */
/*--------------------------------------------------------------------*/
#include "lib.h"
#include "hlib.h"
/*--------------------------------------------------------------------*/
/* Global variables */
/*--------------------------------------------------------------------*/
currentfile();
/*--------------------------------------------------------------------*/
/* m k m a i l b o x */
/* */
/* Build a mailbox name */
/*--------------------------------------------------------------------*/
char *mkmailbox(char *buf, const char *userid)
{
boolean append = ( E_mailext != NULL );
if (buf == NULL) /* Do we need to allocate buffer? */
{
buf = malloc( FILENAME_MAX );
checkref(buf);
} /* if */
if (bflag[F_DIRECT])
{
sprintf(buf,"%s%c%.8s%c%s", E_maildir, SEPCHAR,
userid, SEPCHAR,"newmail");
} /* if (bflag[F_DIRECT]) */
else {
char tuser[FILENAME_MAX];
strcpy( tuser, userid );
if (strchr(userid, '.') == NULL )
tuser[8] = '\0'; /* Auto-truncate mbox name */
else
append = FALSE;
mkfilename(buf, E_maildir, tuser);
} /* else */
/*--------------------------------------------------------------------*/
/* If we need a mailbox extension, add one */
/*--------------------------------------------------------------------*/
if ( append )
strcat( strcat(buf,".") , E_mailext );
return buf;
} /* mkmailbox */